home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1999 March / EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso / earcd / devel / gencodec / source / textfield.c < prev    next >
C/C++ Source or Header  |  1999-01-01  |  2KB  |  61 lines
  1. #include "TextField.h"
  2. #include "Tools.h"
  3.  
  4. #define MUIA_Boopsi_Smart 0x8042b8d7 /* V9 i.. BOOL */
  5.  
  6. struct ObjTextField * CreateTextField( void )
  7. {
  8.     Class *TextFieldClass;
  9.     struct ObjTextField * ObjectApp;
  10.  
  11.     TextFieldClass = TEXTFIELD_GetClass();
  12.  
  13.     if (!(ObjectApp = AllocMemory( sizeof( struct ObjTextField ),FALSE )))
  14.         return( NULL );
  15.  
  16.   ObjectApp->textfield = HGroup,
  17.     MUIA_Group_HorizSpacing, 0,
  18.     Child, ObjectApp->text = BoopsiObject,
  19.       InputListFrame,
  20.       MUIA_Background, MUII_BACKGROUND,
  21.       MUIA_Boopsi_Class, TextFieldClass,
  22.       MUIA_Boopsi_Smart, TRUE,
  23.       MUIA_Boopsi_MinWidth, 20,
  24.       MUIA_Boopsi_MinHeight, 20,
  25.       ICA_TARGET, ICTARGET_IDCMP,
  26.       TEXTFIELD_Text,(ULONG)"",
  27.     End,
  28.     Child, ObjectApp->prop = ScrollbarObject, End,
  29.   End;
  30.  
  31.   if (!(ObjectApp->textfield))
  32.     {
  33.       FreeMemory(ObjectApp);
  34.       ObjectApp = NULL;
  35.     }
  36.  
  37.   DoMethod(ObjectApp->text, MUIM_Notify, TEXTFIELD_Lines, MUIV_EveryTime,
  38.       ObjectApp->prop, 3, MUIM_Set, MUIA_Prop_Entries, MUIV_TriggerValue);
  39.  
  40.   DoMethod(ObjectApp->text, MUIM_Notify, TEXTFIELD_Visible, MUIV_EveryTime,
  41.       ObjectApp->prop, 3, MUIM_Set, MUIA_Prop_Visible, MUIV_TriggerValue);
  42.  
  43.   DoMethod(ObjectApp->text, MUIM_Notify, TEXTFIELD_Top, MUIV_EveryTime,
  44.       ObjectApp->prop, 3, MUIM_NoNotifySet, MUIA_Prop_First, MUIV_TriggerValue);
  45.  
  46.   DoMethod(ObjectApp->prop, MUIM_Notify, MUIA_Prop_First, MUIV_EveryTime,
  47.       ObjectApp->text, 3, MUIM_Set, TEXTFIELD_Top, MUIV_TriggerValue);
  48.  
  49.   return( ObjectApp );
  50. }
  51.  
  52. void DisposeTextField( struct ObjTextField * ObjectApp )
  53. {
  54.     if (ObjectApp != NULL)
  55.     {
  56.         if (ObjectApp->textfield != NULL)
  57.             MUI_DisposeObject(ObjectApp->textfield);
  58.         FreeMemory(ObjectApp);
  59.     }
  60. }
  61.